home *** CD-ROM | disk | FTP | other *** search
/ MacHack 2000 / MacHack 2000.toast / pc / The Hacks / MoreKittiesPlease / Source / DLPIUtils.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-06-23  |  35.6 KB  |  790 lines
  1.  
  2. #ifndef qDebug
  3. #define qDebug    1
  4. #endif
  5.  
  6. #import "DebugFlags.h"
  7.  
  8. #import <OpenTptModule.h>
  9.  
  10. #import <dlpi.h>
  11. #import <tihdr.h>
  12. #import <mistream.h>
  13. #import <string.h>
  14. #import "DLPIUtils.h"
  15. #import "OTDCon.h"
  16.  
  17. enum {
  18.     kNoPrimitive = -1
  19. };
  20.  
  21. asm void __ptr_glue(void)
  22. {
  23.         smclass    GL
  24.         lwz        r0,0(r12)
  25.         stw        RTOC,20(SP)
  26.         mtctr    r0
  27.         lwz        RTOC,4(r12)
  28.         bctr
  29. }
  30.  
  31.  
  32. const char *TypeToString( UInt32 type )
  33. {
  34.     static    char    typeString[256];
  35.     switch ( type )
  36.         {
  37.         case M_DATA            :    BlockMoveData( "M_DATA", typeString, strlen( "M_DATA" )+1 );    break;
  38.         case M_PROTO         :    BlockMoveData( "M_PROTO", typeString, strlen( "M_PROTO" )+1 );    break;
  39.         case M_BREAK         :    BlockMoveData( "M_BREAK", typeString, strlen( "M_BREAK" )+1 );    break;
  40.         case M_PASSFP        :    BlockMoveData( "M_PASSFP", typeString, strlen( "M_PASSFP" )+1 );    break;
  41.         case M_SIG            :    BlockMoveData( "M_SIG", typeString, strlen( "M_SIG" )+1 );    break;
  42.         case M_DELAY         :    BlockMoveData( "M_DELAY", typeString, strlen( "M_DELAY" )+1 );    break;
  43.         case M_CTL            :    BlockMoveData( "M_CTL", typeString, strlen( "M_CTL" )+1 );    break;
  44.         case M_IOCTL         :    BlockMoveData( "M_IOCTL", typeString, strlen( "M_IOCTL" )+1 );    break;
  45.         case M_SETOPTS        :    BlockMoveData( "M_SETOPTS", typeString, strlen( "M_SETOPTS" )+1 );    break;
  46.         case M_RSE            :    BlockMoveData( "M_RSE", typeString, strlen( "M_RSE" )+1 );    break;
  47.         case QPCTL            :    BlockMoveData( "QPCTL", typeString, strlen( "QPCTL" )+1 );    break;
  48.         case M_IOCACK        :    BlockMoveData( "M_IOCACK", typeString, strlen( "M_IOCACK" )+1 );    break;
  49.         case M_IOCNAK        :    BlockMoveData( "M_IOCNAK", typeString, strlen( "M_IOCNAK" )+1 );    break;
  50.         case M_PCPROTO        :    BlockMoveData( "M_PCPROTO", typeString, strlen( "M_PCPROTO" )+1 );    break;
  51.         case M_PCSIG         :    BlockMoveData( "M_PCSIG", typeString, strlen( "M_PCSIG" )+1 );    break;
  52.         case M_FLUSH         :    BlockMoveData( "M_FLUSH", typeString, strlen( "M_FLUSH" )+1 );    break;
  53.         case M_STOP            :    BlockMoveData( "M_STOP", typeString, strlen( "M_STOP" )+1 );    break;
  54.         case M_START         :    BlockMoveData( "M_START", typeString, strlen( "M_START" )+1 );    break;
  55.         case M_HANGUP        :    BlockMoveData( "M_HANGUP", typeString, strlen( "M_HANGUP" )+1 );    break;
  56.         case M_ERROR         :    BlockMoveData( "M_ERROR", typeString, strlen( "M_ERROR" )+1 );    break;
  57.         case M_READ            :    BlockMoveData( "M_READ", typeString, strlen( "M_READ" )+1 );    break;
  58.         case M_COPYIN        :    BlockMoveData( "M_COPYIN", typeString, strlen( "M_COPYIN" )+1 );    break;
  59.         case M_COPYOUT        :    BlockMoveData( "M_COPYOUT", typeString, strlen( "M_COPYOUT" )+1 );    break;
  60.         case M_IOCDATA        :    BlockMoveData( "M_IOCDATA", typeString, strlen( "M_IOCDATA" )+1 );    break;
  61.         case M_PCRSE         :    BlockMoveData( "M_PCRSE", typeString, strlen( "M_PCRSE" )+1 );    break;
  62.         case M_STOPI         :    BlockMoveData( "M_STOPI", typeString, strlen( "M_STOPI" )+1 );    break;
  63.         case M_STARTI        :    BlockMoveData( "M_STARTI", typeString, strlen( "M_STARTI" )+1 );    break;
  64.         case M_HPDATA        :    BlockMoveData( "M_HPDATAM_HPDATA", typeString, strlen( "M_HPDATA" )+1 );    break;
  65.         default:
  66.             BlockMoveData( "Unknown type", typeString, strlen( "Unknown type    " )+1 );
  67.             break;
  68.         }
  69.     return typeString;
  70. }
  71.  
  72. const char *ErrorAckCodeToString( UInt32 code )
  73. {
  74.     static    char    errorString[255];
  75.     
  76.     switch ( code )
  77.         {
  78.         case DL_ACCESS        :    BlockMoveData( "DL_ACCESS",         errorString, strlen( "DL_ACCESS" )+1 );            break;
  79.         case DL_BADADDR        :    BlockMoveData( "DL_BADADDR",         errorString, strlen( "DL_BADADDR" )+1 );        break;
  80.         case DL_BADCORR        :    BlockMoveData( "DL_BADCORR",         errorString, strlen( "DL_BADCORR" )+1 );        break;
  81.         case DL_BADDATA        :    BlockMoveData( "DL_BADDATA",         errorString, strlen( "DL_BADDATA" )+1 );        break;
  82.         case DL_BADPPA        :    BlockMoveData( "DL_BADPPA",         errorString, strlen( "DL_BADPPA" )+1 );            break;
  83.         case DL_BADPRIM        :    BlockMoveData( "DL_BADPRIM",        errorString, strlen( "DL_BADPRIM" )+1 );        break;
  84.         case DL_BADQOSPARAM    :    BlockMoveData( "DL_BADQOSPARAM",     errorString, strlen( "DL_BADQOSPARAM" )+1 );    break;
  85.         case DL_BADQOSTYPE    :    BlockMoveData( "DL_BADQOSTYPE",     errorString, strlen( "DL_BADQOSTYPE" )+1 );        break;
  86.         case DL_BADSAP        :    BlockMoveData( "DL_BADSAP",         errorString, strlen( "DL_BADSAP" )+1 );            break;
  87.         case DL_BADTOKEN     :    BlockMoveData( "DL_BADTOKEN",         errorString, strlen( "DL_BADTOKEN" )+1 );        break;
  88.         case DL_BOUND        :    BlockMoveData( "DL_BOUND",             errorString, strlen( "DL_BOUND" )+1 );            break;
  89.         case DL_INITFAILED    :    BlockMoveData( "DL_INITFAILED",     errorString, strlen( "DL_INITFAILED" )+1 );        break;
  90.         case DL_NOADDR        :    BlockMoveData( "DL_NOADDRDL_NOADDR", errorString, strlen( "DL_INFO_REQ" )+1 );        break;
  91.         case DL_NOTINIT        :    BlockMoveData( "DL_NOTINIT",         errorString, strlen( "DL_NOTINIT" )+1 );        break;
  92.         case DL_OUTSTATE     :    BlockMoveData( "DL_OUTSTATE",         errorString, strlen( "DL_OUTSTATE" )+1 );        break;
  93.         case DL_SYSERR        :    BlockMoveData( "DL_SYSERR",         errorString, strlen( "DL_SYSERR" )+1 );            break;
  94.         case DL_UNSUPPORTED    :    BlockMoveData( "DL_UNSUPPORTED",     errorString, strlen( "DL_UNSUPPORTED" )+1 );    break;
  95.         case DL_UNDELIVERABLE :    BlockMoveData( "DL_UNDELIVERABLE",     errorString, strlen( "DL_UNDELIVERABLE" )+1 );    break;
  96.         case DL_NOTSUPPORTED  :    BlockMoveData( "DL_NOTSUPPORTED",     errorString, strlen( "DL_NOTSUPPORTED" )+1 );    break;
  97.         case DL_TOOMANY        :    BlockMoveData( "DL_TOOMANY",         errorString, strlen( "DL_TOOMANY" )+1 );        break;
  98.         case DL_NOTENAB        :    BlockMoveData( "DL_NOTENAB",         errorString, strlen( "DL_NOTENAB" )+1 );        break;
  99.         case DL_BUSY         :    BlockMoveData( "DL_BUSY",             errorString, strlen( "DL_BUSY" )+1 );            break;
  100.         case DL_NOAUTO        :    BlockMoveData( "DL_NOAUTO",         errorString, strlen( "DL_NOAUTO" )+1 );            break;
  101.         case DL_NOXIDAUTO    :    BlockMoveData( "DL_NOXIDAUTO",         errorString, strlen( "DL_NOXIDAUTO" )+1 );        break;
  102.         case DL_NOTESTAUTO    :    BlockMoveData( "DL_NOTESTAUTO",     errorString, strlen( "DL_NOTESTAUTO" )+1 );        break;
  103.         case DL_XIDAUTO        :    BlockMoveData( "DL_XIDAUTO",         errorString, strlen( "DL_XIDAUTO" )+1 );        break;
  104.         case DL_TESTAUTO     :    BlockMoveData( "DL_TESTAUTO",         errorString, strlen( "DL_TESTAUTO" )+1 );        break;
  105.         case DL_PENDING        :    BlockMoveData( "DL_PENDING",         errorString, strlen( "DL_PENDING" )+1 );        break;
  106.         }
  107.     return errorString;
  108. }
  109.  
  110. const char *PrimitiveToString( UInt32 primitive )
  111. {
  112.     static    char    primitiveString[256];
  113.     
  114.     switch ( primitive )
  115.         {
  116.         case DL_INFO_REQ         :    BlockMoveData( "DL_INFO_REQ", primitiveString, strlen( "DL_INFO_REQ" )+1 );    break;
  117.         case DL_INFO_ACK         :    BlockMoveData( "DL_INFO_ACK", primitiveString, strlen( "DL_INFO_ACK" )+1 );    break;
  118.         case DL_ATTACH_REQ        :    BlockMoveData( "DL_ATTACH_REQ", primitiveString, strlen( "DL_ATTACH_REQ" )+1 );    break;
  119.         case DL_DETACH_REQ        :    BlockMoveData( "DL_DETACH_REQ", primitiveString, strlen( "DL_DETACH_REQ" )+1 );    break;
  120.         case DL_BIND_REQ         :    BlockMoveData( "DL_BIND_REQ", primitiveString, strlen( "DL_BIND_REQ" )+1 );    break;
  121.         case DL_BIND_ACK         :    BlockMoveData( "DL_BIND_ACK", primitiveString, strlen( "DL_BIND_ACK" )+1 );    break;
  122.         case DL_UNBIND_REQ        :    BlockMoveData( "DL_UNBIND_REQ", primitiveString, strlen( "DL_UNBIND_REQ" )+1 );    break;
  123.         case DL_OK_ACK            :    BlockMoveData( "DL_OK_ACK", primitiveString, strlen( "DL_OK_ACK" )+1 );    break;
  124.         case DL_ERROR_ACK        :    BlockMoveData( "DL_ERROR_ACK", primitiveString, strlen( "DL_ERROR_ACK" )+1 );    break;
  125.         case DL_SUBS_BIND_REQ    :    BlockMoveData( "DL_SUBS_BIND_REQ", primitiveString, strlen( "DL_SUBS_BIND_REQ" )+1 );    break;
  126.         case DL_SUBS_BIND_ACK    :    BlockMoveData( "DL_SUBS_BIND_ACK", primitiveString, strlen( "DL_SUBS_BIND_ACK" )+1 );    break;
  127.         case DL_SUBS_UNBIND_REQ    :    BlockMoveData( "DL_SUBS_UNBIND_REQ", primitiveString, strlen( "DL_SUBS_UNBIND_REQ" )+1 );    break;
  128.         case DL_ENABMULTI_REQ    :    BlockMoveData( "DL_ENABMULTI_REQ", primitiveString, strlen( "DL_ENABMULTI_REQ" )+1 );    break;
  129.         case DL_DISABMULTI_REQ    :    BlockMoveData( "DL_DISABMULTI_REQ", primitiveString, strlen( "DL_DISABMULTI_REQ" )+1 );    break;
  130.         case DL_PROMISCON_REQ    :    BlockMoveData( "DL_PROMISCON_REQ", primitiveString, strlen( "DL_PROMISCON_REQ" )+1 );    break;
  131.         case DL_PROMISCOFF_REQ    :    BlockMoveData( "DL_PROMISCOFF_REQ", primitiveString, strlen( "DL_PROMISCOFF_REQ" )+1 );    break;
  132.  
  133. /*
  134.  * Primitives used for Connectionless Service
  135.  */
  136.         case DL_UNITDATA_REQ     :    BlockMoveData( "DL_UNITDATA_REQ", primitiveString, strlen( "DL_UNITDATA_REQ" )+1 );    break;
  137.         case DL_UNITDATA_IND     :    BlockMoveData( "DL_UNITDATA_IND", primitiveString, strlen( "DL_UNITDATA_IND" )+1 );    break;
  138.         case DL_UDERROR_IND        :    BlockMoveData( "DL_UDERROR_IND", primitiveString, strlen( "DL_UDERROR_IND" )+1 );    break;
  139.         case DL_UDQOS_REQ        :    BlockMoveData( "DL_UDQOS_REQ", primitiveString, strlen( "DL_UDQOS_REQ" )+1 );    break;
  140.  
  141. /*
  142.  * Primitives used for Connection-Oriented Service
  143.  */
  144.         case DL_CONNECT_REQ        :    BlockMoveData( "DL_CONNECT_REQ", primitiveString, strlen( "DL_CONNECT_REQ" )+1 );    break;
  145.         case DL_CONNECT_IND        :    BlockMoveData( "DL_CONNECT_IND", primitiveString, strlen( "DL_CONNECT_IND" )+1 );    break;
  146.         case DL_CONNECT_RES        :    BlockMoveData( "DL_CONNECT_RES", primitiveString, strlen( "DL_CONNECT_RES" )+1 );    break;
  147.         case DL_CONNECT_CON        :    BlockMoveData( "DL_CONNECT_RES", primitiveString, strlen( "DL_CONNECT_RES" )+1 );    break;
  148.  
  149.         case DL_TOKEN_REQ        :    BlockMoveData( "DL_TOKEN_REQ", primitiveString, strlen( "DL_TOKEN_REQ" )+1 );    break;
  150.         case DL_TOKEN_ACK        :    BlockMoveData( "DL_TOKEN_ACK", primitiveString, strlen( "DL_TOKEN_ACK" )+1 );    break;
  151.  
  152.         case DL_DISCONNECT_REQ    :    BlockMoveData( "DL_DISCONNECT_REQ", primitiveString, strlen( "DL_DISCONNECT_REQ" )+1 );    break;
  153.         case DL_DISCONNECT_IND    :    BlockMoveData( "DL_DISCONNECT_IND", primitiveString, strlen( "DL_DISCONNECT_IND" )+1 );    break;
  154.  
  155.         case DL_RESET_REQ        :    BlockMoveData( "DL_RESET_REQ", primitiveString, strlen( "DL_RESET_REQ" )+1 );    break;
  156.         case DL_RESET_IND        :    BlockMoveData( "DL_RESET_IND", primitiveString, strlen( "DL_RESET_IND" )+1 );    break;
  157.         case DL_RESET_RES        :    BlockMoveData( "DL_RESET_RES", primitiveString, strlen( "DL_RESET_RES" )+1 );    break;
  158.         case DL_RESET_CON        :    BlockMoveData( "DL_RESET_CON", primitiveString, strlen( "DL_RESET_CON" )+1 );    break;
  159.  
  160. /*
  161.  *    Primitives used for Acknowledged Connectionless Service
  162.  */
  163.  
  164.         case DL_DATA_ACK_REQ             :    BlockMoveData( "DL_DATA_ACK_REQ", primitiveString, strlen( "DL_DATA_ACK_REQ" )+1 );    break;
  165.         case DL_DATA_ACK_IND             :    BlockMoveData( "DL_DATA_ACK_IND", primitiveString, strlen( "DL_DATA_ACK_IND" )+1 );    break;
  166.         case DL_DATA_ACK_STATUS_IND        :    BlockMoveData( "DL_DATA_ACK_STATUS_IND", primitiveString, strlen( "DL_DATA_ACK_STATUS_IND" )+1 );    break;
  167.         case DL_REPLY_REQ                :    BlockMoveData( "DL_REPLY_REQ", primitiveString, strlen( "DL_REPLY_REQ" )+1 );    break;
  168.         case DL_REPLY_IND                :    BlockMoveData( "DL_REPLY_IND", primitiveString, strlen( "DL_REPLY_IND" )+1 );    break;
  169.         case DL_REPLY_STATUS_IND         :    BlockMoveData( "DL_REPLY_STATUS_IND", primitiveString, strlen( "DL_REPLY_STATUS_IND" )+1 );    break;
  170.         case DL_REPLY_UPDATE_REQ         :    BlockMoveData( "DL_REPLY_UPDATE_REQ", primitiveString, strlen( "DL_REPLY_UPDATE_REQ" )+1 );    break;
  171.         case DL_REPLY_UPDATE_STATUS_IND    :    BlockMoveData( "DL_REPLY_UPDATE_STATUS_IND", primitiveString, strlen( "DL_REPLY_UPDATE_STATUS_IND" )+1 );    break;
  172.  
  173. /*
  174.  * Primitives used for XID and TEST operations
  175.  */
  176.  
  177.         case DL_XID_REQ        :    BlockMoveData( "DL_XID_REQ", primitiveString, strlen( "DL_XID_REQ" )+1 );    break;
  178.         case DL_XID_IND        :    BlockMoveData( "DL_XID_IND", primitiveString, strlen( "DL_XID_IND" )+1 );    break;
  179.         case DL_XID_RES        :    BlockMoveData( "DL_XID_RES", primitiveString, strlen( "DL_XID_RES" )+1 );    break;
  180.         case DL_XID_CON        :    BlockMoveData( "DL_XID_CON", primitiveString, strlen( "DL_XID_CON" )+1 );    break;
  181.         case DL_TEST_REQ     :    BlockMoveData( "DL_TEST_REQ", primitiveString, strlen( "DL_TEST_REQ" )+1 );    break;
  182.         case DL_TEST_IND     :    BlockMoveData( "DL_TEST_IND", primitiveString, strlen( "DL_TEST_IND" )+1 );    break;
  183.         case DL_TEST_RES     :    BlockMoveData( "DL_TEST_RES", primitiveString, strlen( "DL_TEST_RES" )+1 );    break;
  184.         case DL_TEST_CON     :    BlockMoveData( "DL_TEST_CON", primitiveString, strlen( "DL_TEST_CON" )+1 );    break;
  185.  
  186. /*
  187.  * Primitives to get and set the physical address, and to get
  188.  * Statistics
  189.  */
  190.  
  191.         case DL_PHYS_ADDR_REQ        :    BlockMoveData( "DL_PHYS_ADDR_REQ", primitiveString, strlen( "DL_PHYS_ADDR_REQ" )+1 );    break;
  192.         case DL_PHYS_ADDR_ACK        :    BlockMoveData( "DL_PHYS_ADDR_ACK", primitiveString, strlen( "DL_PHYS_ADDR_ACK" )+1 );    break;
  193.         case DL_SET_PHYS_ADDR_REQ    :    BlockMoveData( "DL_SET_PHYS_ADDR_REQ", primitiveString, strlen( "DL_SET_PHYS_ADDR_REQ" )+1 );    break;
  194.         case DL_GET_STATISTICS_REQ    :    BlockMoveData( "DL_GET_STATISTICS_REQ", primitiveString, strlen( "DL_GET_STATISTICS_REQ" )+1 );    break;
  195.         case DL_GET_STATISTICS_ACK    :    BlockMoveData( "DL_GET_STATISTICS_ACK", primitiveString, strlen( "DL_GET_STATISTICS_ACK" )+1 );    break;
  196.  
  197. /*
  198.     TPI primitives.  I don't know why we are getting them, but we are.
  199. */
  200. /* User generated requests */
  201.         case T_BIND_REQ                :    BlockMoveData( "T_BIND_REQ", primitiveString, strlen( "T_BIND_REQ" )+1 );    break;
  202.         case T_CONN_REQ                :    BlockMoveData( "T_CONN_REQ", primitiveString, strlen( "T_CONN_REQ" )+1 );    break;
  203.         case T_CONN_RES                :    BlockMoveData( "T_CONN_RES", primitiveString, strlen( "T_CONN_RES" )+1 );    break;
  204.         case T_DATA_REQ                :    BlockMoveData( "T_DATA_REQ", primitiveString, strlen( "T_DATA_REQ" )+1 );    break;
  205.         case T_DISCON_REQ            :    BlockMoveData( "T_DISCON_REQ", primitiveString, strlen( "T_DISCON_REQ" )+1 );    break;
  206.         case T_EXDATA_REQ            :    BlockMoveData( "T_EXDATA_REQ", primitiveString, strlen( "T_EXDATA_REQ" )+1 );    break;
  207.         case T_INFO_REQ                :    BlockMoveData( "T_INFO_REQ", primitiveString, strlen( "T_INFO_REQ" )+1 );    break;
  208.         case T_OPTMGMT_REQ            :    BlockMoveData( "T_OPTMGMT_REQ", primitiveString, strlen( "T_OPTMGMT_REQ" )+1 );    break;
  209.         case T_ORDREL_REQ            :    BlockMoveData( "T_ORDREL_REQ", primitiveString, strlen( "T_ORDREL_REQ" )+1 );    break;
  210.         case T_UNBIND_REQ            :    BlockMoveData( "T_UNBIND_REQ", primitiveString, strlen( "T_UNBIND_REQ" )+1 );    break;
  211.         case T_UNITDATA_REQ            :    BlockMoveData( "T_UNITDATA_REQ", primitiveString, strlen( "T_UNITDATA_REQ" )+1 );    break;
  212.         case T_ADDR_REQ                :    BlockMoveData( "T_ADDR_REQ", primitiveString, strlen( "T_ADDR_REQ" )+1 );    break;        /* Get address request                */
  213.         case T_UREQUEST_REQ            :    BlockMoveData( "T_UREQUEST_REQ", primitiveString, strlen( "T_UREQUEST_REQ" )+1 );    break;
  214.         case T_REQUEST_REQ            :    BlockMoveData( "T_REQUEST_REQ", primitiveString, strlen( "T_REQUEST_REQ" )+1 );    break;
  215.         case T_UREPLY_REQ            :    BlockMoveData( "T_UREPLY_REQ", primitiveString, strlen( "T_UREPLY_REQ" )+1 );    break;
  216.         case T_REPLY_REQ            :    BlockMoveData( "T_REPLY_REQ", primitiveString, strlen( "T_REPLY_REQ" )+1 );    break;
  217.         case T_CANCELREQUEST_REQ    :    BlockMoveData( "T_CANCELREQUEST_REQ", primitiveString, strlen( "T_CANCELREQUEST_REQ" )+1 );    break;
  218.         case T_CANCELREPLY_REQ        :    BlockMoveData( "T_CANCELREPLY_REQ", primitiveString, strlen( "T_CANCELREPLY_REQ" )+1 );    break;
  219.         case T_REGNAME_REQ            :    BlockMoveData( "T_REGNAME_REQ", primitiveString, strlen( "T_REGNAME_REQ" )+1 );    break;
  220.         case T_DELNAME_REQ            :    BlockMoveData( "T_DELNAME_REQ", primitiveString, strlen( "T_DELNAME_REQ" )+1 );    break;
  221.         case T_LKUPNAME_REQ            :    BlockMoveData( "T_LKUPNAME_REQ", primitiveString, strlen( "T_LKUPNAME_REQ" )+1 );    break;
  222.  
  223. /* Transport generated indications and acknowledgements */
  224.         case T_BIND_ACK                :    BlockMoveData( "T_BIND_ACK", primitiveString, strlen( "T_BIND_ACK" )+1 );    break;
  225.         case T_CONN_CON                :    BlockMoveData( "T_CONN_CON", primitiveString, strlen( "T_CONN_CON" )+1 );    break;
  226.         case T_CONN_IND                :    BlockMoveData( "T_CONN_IND", primitiveString, strlen( "T_CONN_IND" )+1 );    break;
  227.         case T_DATA_IND                :    BlockMoveData( "T_DATA_IND", primitiveString, strlen( "T_DATA_IND" )+1 );    break;
  228.         case T_DISCON_IND            :    BlockMoveData( "T_DISCON_IND", primitiveString, strlen( "T_DISCON_IND" )+1 );    break;
  229.         case T_ERROR_ACK             :    BlockMoveData( "T_ERROR_ACK", primitiveString, strlen( "T_ERROR_ACK" )+1 );    break;
  230.         case T_EXDATA_IND            :    BlockMoveData( "T_EXDATA_IND", primitiveString, strlen( "T_EXDATA_IND" )+1 );    break;
  231.         case T_INFO_ACK                :    BlockMoveData( "T_INFO_ACK", primitiveString, strlen( "T_INFO_ACK" )+1 );    break;
  232.         case T_OK_ACK                :    BlockMoveData( "T_OK_ACK", primitiveString, strlen( "T_OK_ACK" )+1 );    break;
  233.         case T_OPTMGMT_ACK            :    BlockMoveData( "T_OPTMGMT_ACK", primitiveString, strlen( "T_OPTMGMT_ACK" )+1 );    break;
  234.         case T_ORDREL_IND            :    BlockMoveData( "T_ORDREL_IND", primitiveString, strlen( "T_ORDREL_IND" )+1 );    break;
  235.         case T_UNITDATA_IND            :    BlockMoveData( "T_UNITDATA_IND", primitiveString, strlen( "T_UNITDATA_IND" )+1 );    break;
  236.         case T_UDERROR_IND            :    BlockMoveData( "T_UDERROR_IND", primitiveString, strlen( "T_UDERROR_IND" )+1 );    break;
  237.         case T_ADDR_ACK                :    BlockMoveData( "T_ADDR_ACK", primitiveString, strlen( "T_ADDR_ACK" )+1 );    break;
  238.         case T_UREQUEST_IND            :    BlockMoveData( "T_UREQUEST_IND", primitiveString, strlen( "T_UREQUEST_IND" )+1 );    break;
  239.         case T_REQUEST_IND            :    BlockMoveData( "T_REQUEST_IND", primitiveString, strlen( "T_REQUEST_IND" )+1 );    break;
  240.         case T_UREPLY_IND            :    BlockMoveData( "T_UREPLY_IND", primitiveString, strlen( "T_UREPLY_IND" )+1 );    break;
  241.         case T_REPLY_IND            :    BlockMoveData( "T_REPLY_IND", primitiveString, strlen( "T_REPLY_IND" )+1 );    break;
  242.         case T_UREPLY_ACK            :    BlockMoveData( "T_UREPLY_ACK", primitiveString, strlen( "T_UREPLY_ACK" )+1 );    break;
  243.         case T_REPLY_ACK            :    BlockMoveData( "T_REPLY_ACK", primitiveString, strlen( "T_REPLY_ACK" )+1 );    break;
  244.         case T_RESOLVEADDR_REQ        :    BlockMoveData( "T_RESOLVEADDR_REQ", primitiveString, strlen( "T_RESOLVEADDR_REQ" )+1 );    break;
  245.         case T_RESOLVEADDR_ACK        :    BlockMoveData( "T_RESOLVEADDR_ACK", primitiveString, strlen( "T_RESOLVEADDR_ACK" )+1 );    break;
  246.  
  247.         case T_LKUPNAME_CON            :    BlockMoveData( "T_LKUPNAME_CON", primitiveString, strlen( "T_LKUPNAME_CON" )+1 );    break;
  248.         case T_LKUPNAME_RES            :    BlockMoveData( "T_LKUPNAME_RES", primitiveString, strlen( "T_LKUPNAME_RES" )+1 );    break;
  249.         case T_REGNAME_ACK            :    BlockMoveData( "T_REGNAME_ACK", primitiveString, strlen( "T_REGNAME_ACK" )+1 );    break;
  250.         case T_SEQUENCED_ACK        :    BlockMoveData( "T_SEQUENCED_ACK", primitiveString, strlen( "T_SEQUENCED_ACK" )+1 );    break;
  251.  
  252.         case T_EVENT_IND            :    BlockMoveData( "T_EVENT_IND", primitiveString, strlen( "T_EVENT_IND" )+1 );    break;
  253.  
  254.         default:
  255.             BlockMoveData( "Unknown DPLI/TPI code", primitiveString, strlen( "Unknown DPLI/TPI code" )+1 );
  256.             break;
  257.         }
  258.     return primitiveString;
  259. }
  260.  
  261. #define DumpAtOffset( packet, offset, length ) \
  262. do {\
  263.     if ( ((offset) > 0) && ((offset) < 0xffff) ) \
  264.         dprintmem( ((char *)packet) + (offset), (length) ); \
  265. } while(0) \
  266.  
  267. void
  268. DLPIDump_DL_INFO_ACK(dl_info_ack_t *ack)
  269. {
  270.     dprintf( "dl_maxsdu = %d\n", ack->dl_max_sdu);             /* Max bytes in a DLSDU */
  271.     dprintf( "dl_min_sdu = %d\n", ack->dl_min_sdu);             /* Min bytes in a DLSDU */
  272.     dprintf( "dl_addr_length = %d\n", ack->dl_addr_length);         /* length of DLSAP address */
  273.     dprintf( "dl_mac_type = %d\n", ack->dl_mac_type);            /* type of medium supported*/
  274.     dprintf( "dl_reserved = %d\n", ack->dl_reserved);            /* value set to zero */
  275.     dprintf( "dl_current_state = %d\n", ack->dl_current_state);        /* state of DLPI interface */
  276.     dprintf( "dl_sap_length = %d\n", ack->dl_sap_length);            /* current length of SAP part of
  277.                                            dlsap address */
  278.     dprintf( "dl_service_mode = %d\n", ack->dl_service_mode);        /* CO, CL or ACL */
  279.     
  280.     dprintf( "dl_qos_length = %d\n", ack->dl_qos_length);            /* length of qos values */
  281.     dprintf( "dl_qos_offset = %d\n", ack->dl_qos_offset);            /* offset from beg. of block*/
  282.     DumpAtOffset( ack, ack->dl_qos_offset, ack->dl_qos_length );
  283.         
  284.     dprintf( "dl_qos_range_length = %d\n", ack->dl_qos_range_length);    /* available range of qos */
  285.     dprintf( "dl_qos_range_offset = %d\n", ack->dl_qos_range_offset);    /* offset from beg. of block*/
  286.     DumpAtOffset( ack, ack->dl_qos_range_offset, ack->dl_qos_range_length );
  287.         
  288.     dprintf( "dl_provider_style = %d\n", ack->dl_provider_style);        /* style1 or style2 */
  289.     dprintf( "dl_addr_offset = %d\n", ack->dl_addr_offset);         /* offset of the dlsap addr */
  290.     DumpAtOffset( ack, ack->dl_addr_offset, ack->dl_addr_length );
  291.     dprintf( "dl_version = %d\n", ack->dl_version);             /* version number */
  292.     
  293.     dprintf( "dl_brdcst_addr_length = %d\n", ack->dl_brdcst_addr_length);    /* length of broadcast addr */
  294.     dprintf( "dl_brdcst_addr_offset = %d\n", ack->dl_brdcst_addr_offset);    /* offset from beg. of block*/
  295.     DumpAtOffset( ack, ack->dl_brdcst_addr_offset, ack->dl_brdcst_addr_length );
  296.  
  297.     dprintf( "dl_growth = %d\n", ack->dl_growth);                /* set to zero */
  298.  
  299. }
  300.  
  301. void
  302. DLPIDump_DL_BIND_REQ(dl_bind_req_t *req)
  303. {
  304.     dprintf( "dl_sap = %d\n",  req->dl_sap);             /* info to identify dlsap addr*/
  305.     dprintf( "dl_max_conind = %d\n",  req->dl_max_conind);        /* max # of outstanding con_ind*/
  306.     dprintf( "dl_service_mode = %d\n",  req->dl_service_mode);    /* CO, CL or ACL */     
  307.     dprintf( "dl_conn_mgmt = %d\n",  req->dl_conn_mgmt);        /* if non-zero, is con-mgmt stream*/
  308.     dprintf( "dl_xidtest_flg = %d\n",  req->dl_xidtest_flg);     /* if set to 1 indicates automatic
  309.                                    initiation of test and xid frames */
  310. } 
  311.  
  312. void
  313. DLPIDump_DL_BIND_ACK(dl_bind_ack_t *ack)
  314. {
  315.     dprintf( "dl_sap = %d\n", ack-> dl_sap);             /* DLSAP addr info */
  316.     dprintf( "dl_addr_length = %d\n", ack-> dl_addr_length);     /* length of complete DLSAP addr */
  317.     dprintf( "dl_addr_offset = %d\n", ack-> dl_addr_offset);     /* offset from beginning of M_PCPROTO*/
  318.     DumpAtOffset( ack, ack->dl_addr_offset, ack->dl_addr_length );
  319.         
  320.     dprintf( "dl_max_conind = %d\n", ack-> dl_max_conind);        /* allowed max. # of con-ind */
  321.     dprintf( "dl_xidtest_flg = %d\n", ack-> dl_xidtest_flg);     /* responses supported by provider*/
  322. } 
  323.  
  324.  
  325. void
  326. DLPIDump_DL_SUBS_BIND_REQ(dl_subs_bind_req_t *req)
  327. {
  328.     dprintf( "dl_subs_sap_offset = %d\n",  req->dl_subs_sap_offset);             
  329.     dprintf( "dl_subs_sap_length = %d\n",  req->dl_subs_sap_length);        
  330.     DumpAtOffset( req, req->dl_subs_sap_offset, req->dl_subs_sap_length );
  331.     
  332.     dprintf( "dl_subs_bind_class = %d\n",  req->dl_subs_bind_class);         
  333. } 
  334.  
  335. void
  336. DLPIDump_DL_SUBS_BIND_ACK(dl_subs_bind_ack_t *ack)
  337. {
  338.     dprintf( "dl_subs_sap_offset = %d\n", ack-> dl_subs_sap_offset);     /* length of complete DLSAP addr */
  339.     dprintf( "dl_subs_sap_length = %d\n", ack-> dl_subs_sap_length);     /* offset from beginning of M_PCPROTO*/
  340.     DumpAtOffset( ack, ack->dl_subs_sap_offset, ack->dl_subs_sap_length );
  341. } 
  342.  
  343. void
  344. DLPIDump_DL_SUBS_UNBIND_REQ(dl_subs_unbind_req_t *ack)
  345. {
  346.     dprintf( "dl_subs_sap_offset = %d\n", ack-> dl_subs_sap_offset);     /* length of complete DLSAP addr */
  347.     dprintf( "dl_subs_sap_length = %d\n", ack-> dl_subs_sap_length);     /* offset from beginning of M_PCPROTO*/
  348.     DumpAtOffset( ack, ack->dl_subs_sap_offset, ack->dl_subs_sap_length );
  349. } 
  350.  
  351.  
  352.  
  353. void
  354. DLPIDump_DL_OK_ACK(dl_ok_ack_t *ack)
  355. {
  356.     dprintf( "dl_correct_primitive = %d\n", ack-> dl_correct_primitive);     
  357. }
  358.  
  359. void
  360. DLPIDump_DL_ENABMULTI_REQ(dl_enabmulti_req_t *ack)
  361. {
  362.     dprintf( "dl_addr_length = %d\n", ack-> dl_addr_length);     
  363.     dprintf( "dl_addr_offset = %d\n", ack-> dl_addr_offset);     
  364.     DumpAtOffset( ack, ack->dl_addr_offset, ack->dl_addr_length );
  365. } 
  366.  
  367. static void
  368. DLPIDump_dl_priority_t( dl_priority_t *priority )
  369. {
  370.     dprintf( "priority dl_min = %d\n", priority-> dl_min);     
  371.     dprintf( "priority dl_max = %d\n", priority-> dl_max);     
  372. }
  373.  
  374. void
  375. DLPIDump_DL_UNITDATA_REQ(dl_unitdata_req_t *ack)
  376. {
  377.     dprintf( "dl_dest_addr_length = %d\n", ack-> dl_dest_addr_length);     
  378.     dprintf( "dl_dest_addr_offset = %d\n", ack-> dl_dest_addr_offset);     
  379.     DumpAtOffset( ack, ack->dl_dest_addr_offset, ack->dl_dest_addr_length );
  380.  
  381.     DLPIDump_dl_priority_t( &ack->dl_priority );     
  382. } 
  383.  
  384. void
  385. DLPIDump_DL_UNITDATA_IND(dl_unitdata_ind_t *ack)
  386. {
  387.     dprintf( "dl_dest_addr_length = %d\n", ack-> dl_dest_addr_length);     
  388.     dprintf( "dl_dest_addr_offset = %d\n", ack-> dl_dest_addr_offset);     
  389.     DumpAtOffset( ack, ack->dl_dest_addr_offset, ack->dl_dest_addr_length );
  390.  
  391.     dprintf( "dl_src_addr_length = %d\n", ack-> dl_src_addr_length);     
  392.     dprintf( "dl_src_addr_offset = %d\n", ack-> dl_src_addr_offset);     
  393.     DumpAtOffset( ack, ack->dl_src_addr_offset, ack->dl_src_addr_length );
  394.  
  395.     dprintf( "dl_group_address = %d\n", ack-> dl_group_address);     
  396. }
  397.  
  398.  
  399. void
  400. DLPIDump_DL_ERROR_ACK(dl_error_ack_t *ack)
  401. {
  402.     dprintf( "dl_error_primitive = %s(%d)\n", 
  403.                     PrimitiveToString(ack-> dl_error_primitive),
  404.                     ack-> dl_error_primitive);     
  405.     dprintf( "dl_errno = %s(%d)\n", 
  406.                     ErrorAckCodeToString(ack-> dl_errno),
  407.                     ack-> dl_errno);     
  408.     dprintf( "dl_unix_errno = %d\n", ack-> dl_unix_errno);     
  409. }
  410.  
  411. void
  412. TIDump_T_INFO_ACK(T_info_ack *ack)
  413. {
  414.     dprintf( "TSDU_size = %d\n", ack->TSDU_size);        /* max TSDU size */
  415.     dprintf( "ETSDU_size = %d\n", ack->ETSDU_size);     /* max ETSDU size */
  416.     dprintf( "CDATA_size = %d\n", ack->CDATA_size);     /* connect data size */
  417.     dprintf( "DDATA_size = %d\n", ack->DDATA_size);     /* disconnect data size */
  418.     dprintf( "ADDR_size = %d\n", ack->ADDR_size);        /* TSAP size */
  419.     dprintf( "OPT_size = %d\n", ack->OPT_size);        /* options size */
  420.     dprintf( "TIDU_size = %d\n", ack->TIDU_size);        /* TIDU size */
  421.     dprintf( "SERV_type = %d\n", ack->SERV_type);        /* service type */
  422.     dprintf( "CURRENT_state = %d\n", ack->CURRENT_state);    /* current state */
  423.     dprintf( "PROVIDER_flag = %d\n", ack->PROVIDER_flag);    /* provider flags (see xti.h for defines) */
  424. } 
  425.  
  426. void
  427. TIDump_T_BIND_REQ(T_bind_req *ack)
  428. {
  429.     dprintf( "ADDR_length = %d\n", ack->ADDR_length);        /*  */
  430.     dprintf( "ADDR_offset = %d\n", ack->ADDR_offset);        /*  */
  431.     DumpAtOffset( ack, ack->ADDR_offset, ack->ADDR_length );
  432. }
  433.  
  434. void
  435. TIDump_T_BIND_ACK(T_bind_ack *ack)
  436. {
  437.     dprintf( "ADDR_length = %d\n", ack->ADDR_length);        /*  */
  438.     dprintf( "ADDR_offset = %d\n", ack->ADDR_offset);        /* */
  439.     DumpAtOffset( ack, ack->ADDR_offset, ack->ADDR_length );
  440. }
  441.  
  442. void
  443. TIDump_T_CONN_CON(T_conn_con *ack)
  444. {
  445.     dprintf( "RES_length = %d\n", ack->RES_length);        /*  */
  446.     dprintf( "RES_length = %d\n", ack->RES_length);        /* */
  447.     DumpAtOffset( ack, ack->RES_offset, ack->RES_length );
  448.  
  449.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  450.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  451.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  452. }
  453.  
  454. void
  455. TIDump_T_CONN_IND(T_conn_ind *ack)
  456. {
  457.     dprintf( "SRC_length = %d\n", ack->SRC_length);        /*  */
  458.     dprintf( "SRC_offset = %d\n", ack->SRC_offset);        /* */
  459.     DumpAtOffset( ack, ack->SRC_offset, ack->SRC_length );
  460.  
  461.  
  462.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  463.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  464.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  465. }
  466.  
  467. void
  468. TIDump_T_CONN_REQ(T_conn_req *ack)
  469. {
  470.     dprintf( "DEST_length = %d\n", ack->DEST_length);        /*  */
  471.     dprintf( "DEST_offset = %d\n", ack->DEST_offset);        /* */
  472.     DumpAtOffset( ack, ack->DEST_offset, ack->DEST_length );
  473.  
  474.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  475.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  476.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  477. }
  478.  
  479. void
  480. TIDump_T_CONN_RES(T_conn_res *ack)
  481. {
  482.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  483.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  484.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  485. }
  486.  
  487. void
  488. TIDump_T_OPTMGMT_ACK(T_optmgmt_ack *ack)
  489. {
  490.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  491.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  492.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  493.  
  494.     dprintf( "MGMT_flags = %d\n", ack->MGMT_flags);        /* */    
  495. }
  496.  
  497. void
  498. TIDump_T_OPTMGMT_REQ(T_optmgmt_req *ack)
  499. {
  500.     dprintf( "OPT_length = %d\n", ack->OPT_length);        /*  */
  501.     dprintf( "OPT_offset = %d\n", ack->OPT_offset);        /* */
  502.     DumpAtOffset( ack, ack->OPT_offset, ack->OPT_length );
  503.  
  504.     dprintf( "MGMT_flags = %d\n", ack->MGMT_flags);        /* */    
  505. }
  506.  
  507.  
  508. void
  509. TIDump_T_OK_ACK(T_ok_ack *ack)
  510. {
  511.     dprintf( "CORRECT_prim = (%s)%d\n", PrimitiveToString(ack->CORRECT_prim), ack->CORRECT_prim);        /*  */
  512. }
  513.  
  514.  
  515. long GetPrimitive(mblk_t* mp)
  516.     // GetPrimitive gets the TPI/DLPI primitive out of a message block.
  517.     // It returns kNoPrimitive if the message block is of the wrong
  518.     // type or there is no primitive.
  519.     //
  520.     // Environment: any standard STREAMS entry point
  521. {
  522.     if ((mp->b_datap->db_type == M_PROTO || mp->b_datap->db_type == M_PCPROTO) && MBLK_SIZE(mp) >= sizeof(long) ) {
  523.         return ( ( (union T_primitives*) mp->b_rptr)->type );
  524.     } else {
  525.         return ( kNoPrimitive );
  526.     }
  527. }
  528.  
  529. void
  530. MIDump_M_SETOPTS( struct stroptions *options )
  531. {
  532.     dprintf( "flags = %x\t", options->so_flags );
  533.     if ( options->so_flags == SO_ALL )
  534.         dprintf( "All flags" );
  535.     else
  536.         {
  537.         if ( options->so_flags & SO_READOPT )    dprintf( "Read Mode\t" );
  538.         if ( options->so_flags & SO_WROFF )        dprintf( "Write offset\t" );
  539.         if ( options->so_flags & SO_MINPSZ )    dprintf( "Min Packet Size\t" );
  540.         if ( options->so_flags & SO_MAXPSZ )    dprintf( "Max Packet Size\t" );
  541.         if ( options->so_flags & SO_HIWAT )        dprintf( "High water\t" );
  542.         if ( options->so_flags & SO_LOWAT )        dprintf( "Low water\t" );
  543.         if ( options->so_flags & SO_MREADON )    dprintf( "Request M_READ\t" );
  544.         if ( options->so_flags & SO_MREADOFF )    dprintf( "No M_READ\t" );
  545.         if ( options->so_flags & SO_NDELON )    dprintf( "Old O_NDELAY\t" );
  546.         if ( options->so_flags & SO_NDELOFF )    dprintf( "New O_NDELAY\t" );
  547.         if ( options->so_flags & SO_ISTTY )        dprintf( "Become controlling tty\t" );
  548.         if ( options->so_flags & SO_ISNTTY )    dprintf( "No longer controlling tty\t" );
  549.         if ( options->so_flags & SO_TOSTOP )    dprintf( "Stop on background writes\t" );
  550.         if ( options->so_flags & SO_TONSTOP )    dprintf( "Don't stop on background writes\t" );
  551.         if ( options->so_flags & SO_BAND )        dprintf( "Water marks band\t" );
  552.         if ( options->so_flags & SO_POLL_SET )    dprintf( "Set events\t" );
  553.         if ( options->so_flags & SO_POLL_CLR )    dprintf( "Clear events\t" );
  554.         }
  555.     dprintf( "\n" );
  556.     
  557.     dprintf( "so_wroff = %d\n", options->so_wroff);        /* write offset */
  558.     dprintf( "so_minpsz = %d\n", options->so_minpsz);        /* minimum read packet size */
  559.     dprintf( "so_maxpsz = %d\n", options->so_maxpsz);        /* maximum read packet size */
  560.     dprintf( "so_hiwat = %d\n", options->so_hiwat);        /* read queue high-water mark */
  561.     dprintf( "so_lowat = %d\n", options->so_lowat);        /* read queue low-water mark */
  562.     dprintf( "so_band = %d\n", options->so_band);         /* band for water marks */
  563.     dprintf( "so_poll_set = %d\n", options->so_poll_set);    /* poll events to set */
  564.     dprintf( "so_poll_clr = %d\n", options->so_poll_clr);    /* poll events to clear */
  565.         
  566. }
  567.  
  568. static void
  569. MIDump_Cred( cred_t *cred )
  570. {
  571.     if ( cred )
  572.         {
  573.         dprintf( "cr_ref = %d\n", cred->cr_ref );
  574.         dprintf( "cr_ngroups = %d\n", cred->cr_ngroups );
  575.         dprintf( "cr_uid = %d\n", cred->cr_uid );
  576.         dprintf( "cr_gid = %d\n", cred->cr_gid );
  577.         dprintf( "cr_ruid = %d\n", cred->cr_ruid );
  578.         dprintf( "cr_rgid = %d\n", cred->cr_rgid );
  579.         dprintf( "cr_suid = %d\n", cred->cr_suid );
  580.         dprintf( "cr_sgid = %d\n", cred->cr_sgid );
  581.         dprintf( "cr_groups[0] = %d\n", cred->cr_groups[0] );
  582.         }
  583.     else
  584.         dprintf( "cred is null\n" );
  585. }
  586.  
  587. void
  588. MIDump_M_IOCTL( struct iocblk *block)
  589. {
  590.     dprintf( "ioc_cmd = %x\n", block->ioc_cmd );
  591. //    MIDump_Cred( block->ioc_cr );
  592.     dprintf( "ioc_id = %d\n", block->ioc_id );
  593.     dprintf( "ioc_count = %d\n", block->ioc_count );
  594.     dprintf( "ioc_error = %d\n", block->ioc_error );
  595.     dprintf( "ioc_rval= %d\n", block->ioc_rval );
  596. }
  597.  
  598.  
  599.  
  600.  
  601. static void
  602. DumpIP( IPHeader *packet, Ptr end_packet )
  603. {
  604.     if ( end_packet < (char *)packet + sizeof(IPHeader) )
  605.         {dprintf( "short packet!!!\n" ); return;}
  606.     
  607.     dprintf( "IP:       Dest: %d.%d.%d.%d,  Source: %d.%d.%d.%d\n",
  608.                             packet->destAddr >> 24,
  609.                             (packet->destAddr >> 16) & 0xff,
  610.                             (packet->destAddr >> 8) & 0xff,
  611.                             (packet->destAddr) & 0xff,
  612.                             packet->sourceAddr >> 24,
  613.                             (packet->sourceAddr >> 16) & 0xff,
  614.                             (packet->sourceAddr >> 8) & 0xff,
  615.                             (packet->sourceAddr) & 0xff
  616.         );
  617.     
  618.     dprintf( "          ID: %x  Time-to-Live: %d, Total Length: %d\n",
  619.                             packet->id,
  620.                             packet->timeToLive,
  621.                             packet->totalLength
  622.         );
  623.                             
  624. }
  625.  
  626. static void
  627. DumpUDP( UDPPacket *packet, Ptr end_packet )
  628. {
  629.     dprintf( "\n\nUDP packet\n" );
  630.     
  631.     DumpIP( &packet->ipHeader, end_packet );
  632.     
  633.     if ( end_packet < (char *)packet + sizeof(UDPPacket) )
  634.         {dprintf( "short packet!!!\n" ); return;}
  635.     
  636.     dprintf( "UDP:       Dest: 0x%x  Source: 0x%x  Len:%d\n",
  637.                             packet->destPort,
  638.                             packet->sourcePort,
  639.                             packet->udpLength
  640.         );
  641.         
  642. }
  643.  
  644. static void
  645. DumpTCP( TCPPacket *packet, Ptr end_packet )
  646. {
  647.     dprintf( "\n\nTCP packet\n" );
  648.     
  649.     DumpIP( &packet->ipHeader, end_packet );
  650.     
  651.     if ( end_packet < (char *)packet + sizeof(TCPPacket) )
  652.         {dprintf( "short packet!!!\n" ); return;}
  653.     
  654.     dprintf( "TCP:       Dest: 0x%x  Source: 0x%x\n",
  655.                             packet->destPort,
  656.                             packet->sourcePort
  657.         );
  658.     dprintmem( (char *)packet + sizeof( TCPPacket ), packet->ipHeader.totalLength-sizeof(TCPPacket) );
  659.         
  660. }
  661.  
  662. static void
  663. DumpData( mblk_t *mp )
  664. {
  665.     char    *ptr, *end_ptr;
  666.     char    buffer[10240];
  667.     
  668.     ptr     = buffer;
  669.     while ( mp )
  670.         {
  671.         BlockMoveData( mp->b_rptr, ptr, mp->b_wptr - mp->b_rptr );
  672.         dprintf( "%d bytes in block\n", mp->b_wptr - mp->b_rptr );
  673.         ptr += ( mp->b_wptr - mp->b_rptr );
  674.         mp = mp->b_cont;
  675.         }
  676.     
  677.     end_ptr    = ptr;
  678.     ptr        = buffer;
  679.  
  680.     if ( ((IPHeader *)ptr)->versionAndHeaderLen == 0x45 )
  681.         switch( ((IPHeader *)ptr)->protocol )
  682.             {
  683.             case 0x06:
  684.                 DumpTCP( (TCPPacket *)ptr, end_ptr );
  685.                 break;
  686.             case 0x11:
  687.                 DumpUDP( (UDPPacket *)ptr, end_ptr );
  688.                 break;
  689.             default:
  690.                 dprintf( "Unknown packet type\n" );
  691.                 dprintmem( ptr, end_ptr-ptr );
  692.                 break;
  693.             }
  694.     else
  695.         {
  696.         dprintf( "versionAndHeaderLen == %x\n", ((IPHeader *)ptr)->versionAndHeaderLen );
  697.         dprintmem( ptr, end_ptr-ptr );
  698.         }
  699. }
  700.  
  701. void    Dump_Packet_Type( char *type, mblk_t *mp )
  702. {
  703. #ifdef dumpHeaders
  704.         dprintf( "=========\n%s with type %d (%s)\n\t===>primitive %d (%s)\n", 
  705.                                             type,
  706.                                             mp->b_datap->db_type,
  707.                                             TypeToString(mp->b_datap->db_type),
  708.                                             GetPrimitive(mp),
  709.                                             PrimitiveToString( GetPrimitive(mp) )
  710.                                             );
  711.  
  712. #endif
  713. }
  714.  
  715. void    Dump_Packet( mblk_t*mp )
  716. {
  717. #ifndef dumpDetails
  718. #pragma unused( mp )
  719. #else
  720.     do {
  721.         switch ( mp->b_datap->db_type )
  722.             {
  723. #ifdef dumpM_PROTO
  724.             case M_SETOPTS:
  725.                 MIDump_M_SETOPTS( (struct stroptions *)mp->b_rptr );
  726.                 break;
  727.             case M_IOCACK:
  728.             case M_IOCNAK:
  729.             case M_IOCTL:
  730.                 MIDump_M_IOCTL( (struct iocblk *)mp->b_rptr );
  731.                 break;
  732. #endif
  733.             case M_PCSIG:
  734.                 dprintmem( mp->b_rptr, mp->b_wptr - mp->b_rptr );
  735.                 if ( mp->b_cont )
  736.                     dprintf( "There was more\n" );
  737.                 break;
  738.             case M_FLUSH:
  739.                 dprintf( "Flushing the following (%x):", *mp->b_rptr );
  740.                 if ( *mp->b_rptr & FLUSHW )
  741.                     dprintf( " write queues" );
  742.                 if ( *mp->b_rptr & FLUSHR )
  743.                     dprintf( " read queues" );
  744.                 if ( *mp->b_rptr & FLUSHBAND )
  745.                     dprintf( "Band" );
  746.                 dprintf( "\n" );
  747.                 break;
  748.             case M_DATA:
  749. #ifdef dumpM_DATA
  750.                 DumpData( mp ); 
  751. #else
  752.                 dprintmem( mp->b_rptr, mp->b_wptr-mp->b_rptr );
  753. #endif
  754.                 break;
  755.             
  756. #ifdef dumpM_PROTO
  757.             case M_PROTO:
  758.             case M_PCPROTO:
  759.                 switch ( GetPrimitive(mp) )
  760.                     {
  761.                     case DL_INFO_ACK:        DLPIDump_DL_INFO_ACK( (dl_info_ack_t *)mp->b_rptr );    break;
  762.                     case DL_BIND_REQ:        DLPIDump_DL_BIND_REQ( (dl_bind_req_t *)mp->b_rptr );    break;
  763.                     case DL_BIND_ACK:        DLPIDump_DL_BIND_ACK( (dl_bind_ack_t *)mp->b_rptr );    break;
  764.                     case DL_SUBS_BIND_REQ:    DLPIDump_DL_SUBS_BIND_REQ( (dl_subs_bind_req_t *)mp->b_rptr );    break;
  765.                     case DL_SUBS_BIND_ACK:    DLPIDump_DL_SUBS_BIND_ACK( (dl_subs_bind_ack_t *)mp->b_rptr );    break;
  766.                     case DL_SUBS_UNBIND_REQ:DLPIDump_DL_SUBS_UNBIND_REQ( (dl_subs_unbind_req_t *)mp->b_rptr );    break;
  767.                     case DL_ENABMULTI_REQ:    DLPIDump_DL_ENABMULTI_REQ( (dl_enabmulti_req_t *)mp->b_rptr );    break;
  768.                     case DL_OK_ACK:            DLPIDump_DL_OK_ACK(  (dl_ok_ack_t *)mp->b_rptr );    break;
  769.                     case DL_UNITDATA_REQ:    DLPIDump_DL_UNITDATA_REQ(  (dl_unitdata_req_t *)mp->b_rptr );    break;
  770.                     case DL_UNITDATA_IND:    DLPIDump_DL_UNITDATA_IND(  (dl_unitdata_ind_t *)mp->b_rptr );    break;
  771.                     case DL_ERROR_ACK:        DLPIDump_DL_ERROR_ACK( (dl_error_ack_t *)mp->b_rptr );    break;
  772.  
  773.                     case T_INFO_ACK:    TIDump_T_INFO_ACK(  (T_info_ack *)mp->b_rptr );    break;
  774.                     case T_BIND_REQ:    TIDump_T_BIND_REQ(  (T_bind_req *)mp->b_rptr );    break;
  775.                     case T_BIND_ACK:    TIDump_T_BIND_ACK(  (T_bind_ack *)mp->b_rptr );    break;
  776.                     case T_CONN_CON:    TIDump_T_CONN_CON(  (T_conn_con *)mp->b_rptr );    break;
  777.                     case T_CONN_IND:    TIDump_T_CONN_IND(  (T_conn_ind *)mp->b_rptr );    break;
  778.                     case T_CONN_REQ:    TIDump_T_CONN_REQ(  (T_conn_req *)mp->b_rptr );    break;
  779.                     case T_CONN_RES:    TIDump_T_CONN_RES(  (T_conn_res *)mp->b_rptr );    break;
  780.                     case T_OPTMGMT_ACK:    TIDump_T_OPTMGMT_ACK(  (T_optmgmt_ack *)mp->b_rptr );    break;
  781.                     case T_OPTMGMT_REQ:    TIDump_T_OPTMGMT_REQ(  (T_optmgmt_req *)mp->b_rptr );    break;
  782.                     case T_OK_ACK:        TIDump_T_OK_ACK(      (T_ok_ack *)mp->b_rptr );    break;
  783.                     }
  784.                 break;
  785. #endif
  786.             }
  787.         } while ( (mp = mp->b_cont) != 0 );
  788. #endif
  789. }
  790.